Apple Reference & Presentation Library 1994 January (Partner)

home *** CD-ROM | disk | FTP | other *** search

/ Apple Reference & Present…nuary (Partner) - Disc 2 / The Apple Reference and Presentations Library (Disc 2)(January 1994).iso / Diehl Graphsoft / Japanese / MiniCad / MiniCad-68K / MiniCad 5.0.1-J / MiniCad 5.0.1-J.rsrc / STR#_7015.txt < prev next >

Wrap

Text File | 1994-10-06 | 1KB | 27 lines

√ß¬ø√ØW(X1,Y1)√á‚àÜ(X2,Y2)√á‚Ñ¢√¨√¥√á¬µ√á√ò√á√ç√á≈í TRUE√áÔ£ø√ÖA√á‚âà√á¬ª√á√ò√á√ç√á≈íFALSE√áÔ£ø√Ø‚Äò√á¬µ√á‚Äπ√á‚àë√ÖB EqualPt(X1, Y1, X2, Y2 : REAL) : BOOLEAN; √©l√§p√•`√ß¬ø√ØW(X1,Y1,X2,Y2)√á‚àÜ(X3,Y3,X4,Y4)√á‚Ñ¢√¨√¥√á¬µ√á√ò√á√ç√á≈íTRUE√áÔ£ø√á‚âà√á¬ª√á√ò√á√ç√á≈íFALSE√áÔ£ø√Ø‚Äò√á¬µ√á‚Äπ√á‚àë√ÖB EqualRect(X1, Y1, X2, Y2, X3, Y3, X4, Y4 : REAL) : BOOLEAN; √©l√§p√•`√ß¬ø√ØW(X1,Y1,X2,Y2)√á‚àÜ(X3,X3,X4,Y4)√á√É2√á¬¨√áÔ£ø√§‚Äπ√áÔ¨Å√©l√§p√•`√á√É√ß¬ø√ØW√áÔ£ø(X5,Y5,X6,Y6) √á‚Ä¶√Ø‚Äò√á¬µ√á‚Äπ√á‚àë√ÖB UnionRect(X1, Y1, X2, Y2, X3, Y3, X4, Y4 : REAL; VAR X5, Y5, X6, Y6 : REAL); √ß¬ø√ØWX,Y√á‚Ñ¢√©l√§p√•`(X1,Y1)(X2,Y2)√á√É√≠√ú√á‚Ä¶√á‚Ä†√á√ç√á≈íTRUE√áÔ£ø√ÖA√á‚âà√á¬ª√á√ò√á√ç√á≈íFALSE√áÔ£ø√Ø‚Äò√á¬µ√á‚Äπ√á‚àë√ÖB PtInRect(X, Y, X1, Y1, X2, Y2 : REAL) : BOOLEAN; 2√¨_√§‚Äò√á√É√£√≥√≥¬£√áÔ£ø√Ø‚Äò√á¬µ√á‚Äπ√á‚àë√ÖB Distance(X1, Y1, X2, Y2 : REAL) : REAL; H√á‚Ñ¢√´Œ©√§p√•`√á√∑√á√É√ân√â√¨√âh√â√£√á√É√©√ª√ÖA√ß¬ø√ØW(X,Y)√á‚Ñ¢√´Œ©√§p√•`√¨‚Ä°√á‚Ä¶√á‚Ä†√á√ç√á≈íTRUE√áÔ£ø√ÖA√á‚âà√á¬ª√á√ò√á√ç√á≈íFALSE√áÔ£ø√Ø‚Äò√á¬µ√á‚Äπ√á‚àë√ÖB PtInPoly(X, Y : REAL; H : HANDLE) : BOOLEAN;